<?
	/* Se asegura que el archivo es incluido por el index */
	defined( 'LOAD_MODULE_ACTION' ) or die( 'No esta permitido el acceso directo a ' . __FILE__ );
		$this->oTmpObject = new Submodulo_frm( $this );

	class Submodulo_frm extends Frm
	{
	function Submodulo_frm( &$oModule )
		{
			$this->Frm( $oModule );
			//Crea los Objetos de los campos de edicion

				$this->aFields['ncSubModulo']	= new Input( "Codigo", "ncSubModulo", '', false, true );
				$this->aFields['cdSubModulo']	= new InputText( "Nombre", "cdSubModulo" );
				$this->aFields['cDirectorio']	= new InputText( "Directorio", "cDirectorio" );
				$this->aFields['nDesde']			= new InputText( "Desde", "nDesde" );
				$this->aFields['nHasta']			= new InputText( "Hasta", "nHasta" );
				$this->oDatabase = openMetadataDB ( getParam('cPathModule') );
		}
	function initializeForm()
		{
			// Si viene el Ubicacion hace el retrieve
			if ( $this->isRetrievable() && $this->aFields['ncSubModulo']->getValue() )
			{
				$this->setValue( $this->aFields['ncSubModulo']->getValue() );
			}
			// Configura el Titulo
				$this->setLabel( 'Submodulo' );
			return true;
		}
	function initializeField( $cField , &$oField )
		{
			switch ( $cField )
			{
				case 'cdSubModulo':
					$oField->setLength( 40 );
				break;
				case 'cDirectorio':
					$oField->setLength( 60 );
				break;
				case 'nDesde':
					$nMax = $this->oDatabase->getData("SELECT MAX(nHasta) FROM stSubModulo ");
					$oField->setDefault( $nMax + 1);
				break;
				case 'nHasta':
					$nMax = $this->oDatabase->getData("SELECT MAX(nHasta) FROM stSubModulo ");
					$oField->setDefault( $nMax + 100);
				break;
			}
		}
	function setValue( $ncSubModulo )
		{
			$cSql = "SELECT cdSubModulo,cDirectorio, nDesde, nHasta
								FROM stSubModulo
									WHERE ncSubmodulo = $ncSubModulo";
			$aDatos = $this->oDatabase->getArray($cSql);
			$this->setFieldsArray ( $aDatos );
		}
	}
?>
